Mac Magazin/MacEasy 27/Mac Magazin and MacEasy Magazine CD - Issue 27.iso/Grafik & Text/Sans-Faute⁄Grammaire ƒ/Adaptateurs/spécial HyperCard/Sources des scripts (anglais)/Vérif. HC Champs "cherchables"

Text File | 1996-02-20 | 391b | 16 lines

tell application "HyperCard 2.3"
    activate current stack
    set num to 1
    repeat number of card field times
        if not dontSearch of card field num then
            set texttoCheck to card field num as styled text
            tell application "Sans-Faute/Grammaire 2"
                set textchecked to Checking texttoCheck
            end tell
            set card field num to textchecked
        end if
        set num to num + 1
    end repeat
end tell